* lisp/simple.el (count-words--buffer-message): Fix narrowing check.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 179d5be11caaf368f8410bf8950915f6dbf41dc6..33e641b5fc19cc6ca6bb9a435eb530d018f6b63d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-09-07  Chong Yidong  <cyd@gnu.org>
 
+       * simple.el (count-words--buffer-message): Fix narrowing check.
+
        * help.el (describe-key-briefly): Allow the message to be seen
        when invoked from the minibuffer (Bug#7014).
 

diff --git a/lisp/simple.el b/lisp/simple.el
index b7a24f4f970ff8f61a2e529c3473b5d32b2733aa..ca73ba1b03af7bafb56789755385f7e54a625231 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1008,7 +1008,7 @@ END, without printing any message."
 
 (defun count-words--buffer-message ()
   (count-words--message
-   (if (= (point-max) (1+ (buffer-size)))
+   (if (= (- (point-max) (point-min)) (buffer-size))
        "Buffer"
      "Narrowed part of buffer")
    (point-min) (point-max)))